﻿Imports Microsoft.VisualBasic
Imports System.Web
Imports System

Public Class BasePage
    Inherits System.Web.UI.Page

    Private Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
        If (Session("UserName") Is Nothing) Or (Session("RoleID") Is Nothing) Then
            Response.Redirect("~/Login.aspx")
        End If
    End Sub
End Class
